# libraries
library(MBNMAdose)
# data
source('data.prep.R') # prepare data
source('data.addFluxdose.R') # class model
source('data.addclass.R') # class model
antidep <- data.prep()
antidep_harmon <- data_with_fluxdose(data=antidep) # harmonize the doses
antidep_class <- data_with_class(antidep_harmon) # add class
# load model fit (it is hard to load them simultaneously)
load('drnma_RE')
load('drnma_rob')
load('drnma_year')
load('drnma_var')
load('drnma_class')
load('drnma_RE_sens')
# load plot functions
source('drnma.plot.1absolute.R')
source('drnma.plot.2absolute.R')
source('drnma.plot.fit.R')
source('drnma.plot.forest.R')
source('drnma.plot.hist.R')
source('drnma.plot.sucra.R')
source('drnma.plot.net.R')
source('drnma.plot.doseDist.R')
# load table functions
source('drnma.tab.comp.R')
source('drnma.tab.coef.R')
source('drnma.tab.converge.R')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.